home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / prgtools / programm.ing / m2gem106.lzh / CRYSTAL1.06 / SRC / TOOLBOX / WINDSET.DEF < prev    next >
Encoding:
Modula Definition  |  1993-01-29  |  1.5 KB  |  97 lines

  1. DEFINITION MODULE WindSet;
  2.  
  3. (*
  4. WindSet - Functions.
  5.  
  6. UK __DATE__ __TIME__
  7. *)
  8.  
  9. (*DEF_SWITCHES*)
  10.  
  11. FROM AES     IMPORT TreePtr,ObjectIndex;
  12. FROM WindMgr IMPORT WindowElement;
  13. FROM RcMgr   IMPORT GRect;
  14. FROM PORTAB  IMPORT UNSIGNEDWORD,SIGNEDWORD;
  15.  
  16. (* WFKind *)
  17.  
  18. PROCEDURE Kind(Handle: SIGNEDWORD; Kind: WindowElement);
  19.  
  20. (* WFName *)
  21.  
  22. PROCEDURE Name(Handle: SIGNEDWORD; VAR Name: ARRAY OF CHAR);
  23.  
  24. (* WFInfo *)
  25.  
  26. PROCEDURE Info(Handle: SIGNEDWORD; VAR Info: ARRAY OF CHAR);
  27.  
  28. (* WFWorkXYWH *)
  29.  
  30. (* WFCurrXYWH *)
  31.  
  32. PROCEDURE CurrXYWH(Handle: SIGNEDWORD; VAR Rect: GRect);
  33.  
  34. (* WFPrevXYWH *)
  35.  
  36. (* WFFullXYWH *)
  37.  
  38. (* WFHSlide *)
  39.  
  40. PROCEDURE HSlide(Handle: SIGNEDWORD; Pos: UNSIGNEDWORD);
  41.  
  42. (* WFVSlide *)
  43.  
  44. PROCEDURE VSlide(Handle: SIGNEDWORD; Pos: UNSIGNEDWORD);
  45.  
  46. (* WFTop *)
  47.  
  48. PROCEDURE Top(Handle: SIGNEDWORD);
  49.  
  50. (* WFFirstXYWH *)
  51.  
  52. (* WFNextXYWH *)
  53.  
  54. (* WFNewDesk *)
  55.  
  56. PROCEDURE NewDesk(PTree: TreePtr; Index: ObjectIndex);
  57.  
  58. (* WFHSlSize *)
  59.  
  60. PROCEDURE HSlSize(Handle: SIGNEDWORD; Size: SIGNEDWORD);
  61.  
  62. (* WFVSlSize *)
  63.  
  64. PROCEDURE VSlSize(Handle: SIGNEDWORD; Size: SIGNEDWORD);
  65.  
  66. (* WFScreen *)
  67.  
  68. (* WFTopAttrb *)
  69.  
  70. PROCEDURE TAttrb(Handle: SIGNEDWORD; IsTop: BOOLEAN);
  71.  
  72. (* WFColor *)
  73.  
  74. (* WFSizTop *)
  75.  
  76. PROCEDURE SizTop(Handle: SIGNEDWORD; VAR Rect: GRect);
  77.  
  78. (* WFDColor *)
  79.  
  80. (* WFTopAp *)
  81.  
  82. (* WFOwner *)
  83.  
  84. (* WFBack *)
  85.  
  86. PROCEDURE Back(Handle: SIGNEDWORD);
  87.  
  88. (* WFBEvent *)
  89.  
  90. PROCEDURE BEvent(Handle: SIGNEDWORD; OnOff: BOOLEAN);
  91.  
  92. (* WFBottom *)
  93.  
  94. PROCEDURE Bottom(Handle: SIGNEDWORD);
  95.  
  96. END WindSet.
  97.